home *** CD-ROM | disk | FTP | other *** search
/ Digital Photography Made Easy 27 / Digital Photography Made Easy Issue 27.iso / pc / Software / SampleImages / ImagePreviewer.dxr / behaviours_7_next pic button.ls < prev    next >
Encoding:
Text File  |  2003-06-20  |  1.3 KB  |  52 lines
  1. property spriteNum, pNum, pName
  2. global gpicture, glastbut, gnextbut, gpopup, camera, gpicNum, CameraGlobalToUse, gcamera1NumOfpics, gcamera2NumOfpics, gcamera3NumOfpics, gcamera4NumOfpics, gcamera5NumOfpics, gcamera6NumOfpics, gcamera7NumOfpics, gcamera8NumOfpics
  3.  
  4. on beginSprite me
  5.   pNum = sprite(me.spriteNum)
  6.   pName = pNum.member.name
  7. end
  8.  
  9. on mouseEnter
  10.   if gpopup = 0 then
  11.     if camera = "camera1" then
  12.       CameraGlobalToUse = gcamera1NumOfpics
  13.     end if
  14.     if camera = "camera2" then
  15.       CameraGlobalToUse = gcamera2NumOfpics
  16.     end if
  17.     if camera = "camera3" then
  18.       CameraGlobalToUse = gcamera3NumOfpics
  19.     end if
  20.     if camera = "camera4" then
  21.       CameraGlobalToUse = gcamera4NumOfpics
  22.     end if
  23.     if camera = "camera5" then
  24.       CameraGlobalToUse = gcamera5NumOfpics
  25.     end if
  26.     pNum.cursor = 280
  27.     pNum.member = member(pName & "_ro", "internal").number
  28.   end if
  29. end
  30.  
  31. on mouseUp
  32.   if gpopup = 0 then
  33.     put gpicNum
  34.     if gpicNum < CameraGlobalToUse then
  35.       gnextbut.locH = 230
  36.       gpicNum = gpicNum + 1
  37.       gpicture.member = member(camera & "_" & gpicNum, "internal").number
  38.       glastbut.locH = 84
  39.     end if
  40.     if gpicNum = CameraGlobalToUse then
  41.       gnextbut.locH = -150
  42.     end if
  43.   end if
  44. end
  45.  
  46. on mouseLeave me
  47.   if gpopup = 0 then
  48.     pNum.member = member(pName, "internal").number
  49.     pNum.cursor = 0
  50.   end if
  51. end
  52.